home *** CD-ROM | disk | FTP | other *** search
/ Workbench Add-On / Workbench Add-On - Volume 1.iso / DiskUtil / Directory / Filer / Install < prev    next >
Encoding:
Text File  |  1995-11-24  |  1012 b   |  49 lines
  1. (if (= @language "deutsch")
  2.     (
  3.         (SET Intro  "Wilkommen zum Installer-Script für Filer")
  4.         (SET Where  "Wohin soll das Filer-Packet hinkopiert werden ?")
  5.         (SET Config "Es existirt eine Demo-Konfiguration. Soll diese übernommen werden ?")
  6.     )
  7. )
  8. (if (= @language "english")
  9.     (
  10.         (SET Intro  "Welcome to the installer-script for Filer")
  11.         (SET Where  "Where do you want to place the Filer-package ?")
  12.         (SET Config "There is a demo-configuration. Do you want to use it ?")
  13.     )
  14. )
  15.  
  16. (MESSAGE Intro)
  17.  
  18. (SET Wutz
  19.     (ASKDIR
  20.         (PROMPT Where)
  21.         (HELP   "")
  22.         (DEFAULT    "sys:")
  23.     )
  24. )
  25.  
  26. (SET DD (TACKON Wutz "Filer"))
  27.  
  28. (RUN (CAT "makedir \""DD"\""))
  29.  
  30. (COPYFILES
  31.     (SOURCE     ":DiskUtil/Directory/Filer/")
  32.     (DEST       DD)
  33.     (INFOS)
  34.     (ALL)
  35. )
  36.  
  37. (IF
  38.     (ASKBOOL
  39.         (PROMPT Config)
  40.         (HELP   "")
  41.     )
  42.     (
  43.         (COPYFILES
  44.             (SOURCE ":Diskutil/Directory/Filer/Examples/Filer.RC")
  45.             (DEST   "s:")
  46.         )
  47.     )
  48. )
  49.